home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Digital Hollywood CD-ROM Demo
/
Digital Hollywood CD-ROM Demo.iso
/
CD-ROM Preview
/
TDCDdemo
/
BlockPump.3
/
BlockPump.3.rsrc
/
bin.rsrc_BITD_1062.bin
(
.txt
)
< prev
next >
Wrap
AmigaBASIC Source Code
|
1993-09-03
|
571b
|
8 lines
RSET<0x7d><0x5e>RSET<0x7d><0x5e>RNDRSETRNDPUTRNDRSET \
<0x10><0x60>RNDPUTRNDPUTRND<0x7d>ELSE<0x7d>PUTRNDPUTRND<0x5e>PRINT<0x7d>ELSE<0xfb,0x00>2RSETRND<0x7d>PUTRNDPUTRND<0x7d>RNDPUTRND<0x5e>PUTRND<0x7d>COMMONRNDCOMMONRND=<0xfb,0x00>4RSETPRINTELSEPUTELSECOMMONRNDCOMMONELSECOMMONCOSELSECOMMONCOMMONELSECOMMONELSERNDPRINT<0x5e><0x7d><0x60><0xfb,0x00><0x05>PRINTELSEPRINTELSECOMMONRND<0x7e>COMMON&H8e6aCLOSEdELSEcELSEPRINT<0x7d>ELSEPRINTELSE=<0xfb,0x00><0x07>ELSEPUTELSECOMMON<0x7d>COMMONCOMMONELSE<0x7e>COMMON<0x0b>dELSEcCOMMONCOMMONRNDCOMMONRSETPRINTRND
=<0x7c>
3<0x7d>ELSECOMMONRNDCOMMONELSEELSECOMMONELSECOMMONdELSECLOSECOMMONdELSE<0x7d>RNDPRINTELSEPUT<0xfb,0x00><0x0a>COMMONPUTELSECOMMON<0x5d>COMMONCOMMONELSECOMMONCOMMONELSE<0x7e>COMMON<0x07>ELSECOMMONRNDCOMMONRNDPUTRND<0x60><0xfb,0x00>3<0x5e>ELSE<0x7d>ELSEPRINTELSERNDCOMMONCOMMONELSECOMMONCOMMONELSEdCOMMONELSEPRINTRND<0x7d>ELSEPRINT<0x7e>
<0x7d>
3PRINT<0x7d>ELSEPUTELSECOMMONCOMMONRNDCOMMONELSECOMMONELSECOMMONCOMMONELSECOMMONRNDCOMMONRND<0x7d>ELSE<0xfb,0x00>ELSECOMMON<0x7d>RNDCOSELSE<0x7e>COMMONRNDCOMMONRND<0x7d>ELSEPUT<0xfb,0x00>3PUTRNDELSEPRINTRND <0x7d>COMMONELSE<0x7d>COMMONELSECOMMONCOMMONRNDPUTELSE<0x7d>ELSE<0x8c,0x00>3RNDCOSPUTELSEPUTELSECOMMONRNDCOMMONELSECOMMONELSECOMMON<0x7d>ELSE<0x7d>COMMONRND<0x7d>ELSEPRINT<0x8c,0x00><0x0a>COMMONRNDRNDPUTELSEPRINTELSEPUTELSEPUTELSE<0x0b>PRINT<0x5d>COMMON<0x7d>COMMONRNDRNDCOMMONPUTRND
<0x60><0x7c>
4RSET<0x7d>COSRNDCOMMONRNDPUTELSEPRINTELSE<0x7d>COMMONCOMMONRNDCOMMONELSERSETCOMMONRNDRND<0x7d><0x60><0x8c,0x00>4<0x7d>ELSE<0x7d>COMMONRNDCOSRNDCOMMONELSEPUTELSE<0x7d>ELSECOSRND<0x7d>COMMONRNDPUTELSE<0x7d><0x60><0x8c,0x00>3ELSEPUT<0x7d>RNDCOSRNDCOMMONRNDPUTELSECOMMONELSEPUTRNDCOMMONELSERNDPUTRNDPRINTELSE<0x8c,0x00> RNDCOMMON<0x5e>PRINTRNDCOSRNDCOMMON<0x7d>RNDCOSRNDCOMMONRNDPUT<0x7d>ELSE<0x7d>ELSE